home *** CD-ROM | disk | FTP | other *** search
/ Scene 96 / Scene 96 International Edition (Zyklop Software) (Disc 2) (1997).iso / misc / coding / xmasspak / video / 80x200.asm < prev    next >
Encoding:
Assembly Source File  |  1994-11-07  |  1.6 KB  |  88 lines
  1. ;init an 80x200 grafixmode with 256 colors
  2. ;
  3. ;
  4.  
  5. ideal
  6. model small
  7. p386n
  8. stack 256
  9.  
  10. assume cs:coding
  11.  
  12. segment  coding
  13.  
  14. start:        mov ax,0013h
  15.               int 10h
  16.  
  17.               mov dx,03c4h
  18.               mov al,04h
  19.               out dx,al
  20.               inc dx
  21.               in al,dx
  22.               and al,11110111b
  23.               out dx,al
  24.               dec dx
  25.               
  26.               mov ax,0f02h
  27.               out dx,ax
  28.  
  29.               mov dx,03d4h
  30.               mov al,14h
  31.               out dx,al
  32.               inc dx
  33.               in al,dx
  34.               and al,10111111b
  35.               out dx,al
  36.               dec dx
  37.               mov al,17h
  38.               out dx,al
  39.               inc dx
  40.               in al,dx
  41.               or al,01000000b
  42.               out dx,al
  43.               
  44.               mov ax,0a000h
  45.               mov es,ax
  46.               assume es:0a000h
  47.               mov cx,8000h
  48.               xor di,di
  49.               xor ax,ax
  50.               cld
  51.               rep stosw
  52.               
  53.               mov dx,03c4h
  54.               mov ax,0f02h
  55.               out dx,ax
  56.  
  57.               mov cx,80*80
  58.               mov al,01h
  59.               xor di,di
  60. cop1:         mov [es:di],al
  61.               inc di
  62.               inc al
  63.               loop cop1
  64.  
  65. warte:        in al,60h
  66.               cmp al,01h
  67.               jne warte
  68.  
  69.               mov ax,0003h
  70.               int 10h
  71.               
  72.               mov ax,4c00h
  73.               int 21h
  74.  
  75. ends  coding
  76.  
  77. segment  data1
  78.  
  79. dates     db 16 dup (0)
  80.  
  81. ends  data1
  82.  
  83. end start
  84.  
  85.  
  86.  
  87.  
  88.